home *** CD-ROM | disk | FTP | other *** search
/ Aminet 22 / Aminet 22 (1997)(GTI - Schatztruhe)[!][Dec 1997].iso / Aminet / game / role / HammyTown.lha / 5.room < prev    next >
Text File  |  1997-10-22  |  5KB  |  150 lines
  1. /*                     This is a room file for GRAAL
  2. /*
  3. /*                                 5.room
  4.  
  5.  
  6. /* UPDATE: scroll_frames;normal_frames
  7. UPDATE: 3;1
  8.  
  9. /* SECTION: section number
  10. SECTION: 1
  11.  
  12. /* BG_IFF: filename
  13. BG_IFF: 5BG.IFF
  14.  
  15. /* START_POS: sposno;bobimage;x;y;camera;floor
  16. /* 1->Shop/Bar, 2->Trips, 3->Restaurant, 4->Village
  17. START_POS: 1;$800D;312;109;L;1
  18. START_POS: 2;11;226;87;M;1
  19. START_POS: 3;11;80;84;M;1
  20. START_POS: 4;13;5;109;L;1
  21.  
  22. /* FLOOR: floorno;x1;y1;x2;y2;floormap/.../floormap
  23. FLOOR: 1;-1;79;319;117;1-1
  24.  
  25. /* EXIT: no;x1;y1;x2;y2;epointx;epointy;description
  26. EXIT: 1;302;59;319;118;313;110;Shops
  27. EXIT: 2;209;57;238;88;223;82;Boat
  28. EXIT: 3;65;52;89;86;79;80;Floating Restaurant
  29. EXIT: 4;0;56;15;118;4;111;Village
  30.  
  31. /* CLPART: filename
  32. /*
  33. CLPART: 3FG.IFF
  34.  
  35. /* ROOMBOBS: no_of_imgs;startrbob;grabx;graby;width;height;xoffset;hotsp
  36. /* 1-3 is the pleasure boat owner
  37. ROOMBOBS: 3;1;91;126;19;23;20;0
  38.  
  39. /* STATIC: bobno;LBOBimage;putx;puty
  40. /* ANIM: bobno;bobimg;amalchannel;amalsequence;putx;puty
  41.  
  42. /* ROOMOBJ: roomobjno,object_definition.... (see graal.main documentation)
  43.  
  44.  
  45. /* DACT: condition;...;action;...
  46. /*
  47. /*   These lines contain room actions performed directly as you enter the
  48. /* Light up scene
  49. DACT: TRACK MUSIC.06.MOD,LOOP,NOFILTER;LIGHTS ON
  50. DACT: IFRF 1=0;SAY Looks like the boats are in the harbour.;SETRF 1=1;EXIT
  51.  
  52. /* LINE: dlgno;lineno;line;reuseline;conditions
  53. /*
  54. /*   Specifies a line of dialogue
  55. /*
  56. /* LACT: dlgno;lineno;action;...;action
  57. /*
  58. /*   Specifies a line executed when the corresponding LINE
  59. /* 3 is pleasure boat owner dialogue
  60. /*
  61. LINE: 3;1;I'll come back later.;I'll see you later.; 
  62. LACT: 3;1;IFOF 1=0;RESP R,3,Okay. Bye.;SETOF 1=1;EDLG;EXIT
  63. LACT: 3;1;IFOF 1=1;RESP R,3,Okay then.;EDLG;EXIT
  64. /*
  65. LINE: 3;2;Nice boat you have here.; ; 
  66. LACT: 3;2;RESP R,3,Yeah, it is, isn't it?;RESP R,3,It's mine, I bought it about six months ago.;RESP R,3,Fancy a trip in it?;DSET 3,+1,N2,+3,+4,+9
  67.  
  68. /*
  69. LINE: 3;3;Where do you do trips to?; ;IFRF 2=0
  70. LACT: 3;3;RESP R,3,I take people on trips to Polo Island.;DSET 3,N3,+5
  71.  
  72. LINE: 3;4;How much do you charge?;How much did you say you charged?;IFRF 2=0
  73. LACT: 3;4;RESP R,3,£15 will hire me for the day.;RESP R,3,I can then take you on as many trips as you like.;DSET 3,S1,+6,+7,+8
  74.  
  75. LINE: 3;5;Tell me about Polo Island.;Tell me again about Polo Island.; 
  76. LACT: 3;5;RESP R,3,It's a nice island, shaped like a polo mint.
  77. LACT: 3;5;RESP R,3,Hence the name.;RESP R,3,Rumour has it that there is treasure on the island!
  78. LACT: 3;5;SAY Nice One!;RESP R,3,However, nobody has ever found it.
  79.  
  80. LINE: 3;6;Sorry, I don't have that much money on me.;Sorry, I still haven't got that much money.; 
  81. LACT: 3;6;RESP R,3,Well, I can't take you to Polo island, then.
  82. LACT: 3;6;RESP R,3,I have got fuel costs to pay, you know.
  83. LACT: 3;6;DSET 3,R1
  84.  
  85. LINE: 3;7;Would you accept £14?;Are you sure you won't accept £14?;IFCARR 24;IFNOTCARR 23
  86. LACT: 3;7;RESP R,3,No, I'm sorry.\The price is £15.;RESP R,3,Take it or leave it.
  87. LACT: 3;7;DSET 3,-7
  88.  
  89. LINE: 3;8;Okay, you've got yourself a deal!; ;IFCARR 24;IFCARR 23
  90. LACT: 3;8;RESP R,3,Okay.;HANDLE;W 25;HANDLE -1;RESP R,3,Now, whenever you want to go to Polo island, just get on the boat and I will take you there.
  91. LACT: 3;8;SAY Sure thing.;SETRF 2=1;REMOVE 24,N,0;REMOVE 23,N,0;DSET 3,R1
  92.  
  93. LINE: 3;9;Could you bring my new car back from Polo Island?; ;IFRF 21,5=1;IFRF 21,2=0
  94. LACT: 3;9;RESP R,3,Sorry, the boat isn't big enough to do that.;RESP R,3,You'll have to find another way to get it back.
  95. LACT: 3;9;SAY But how?;RESP R,3,Maybe Aztec can help you!
  96. LACT: 3;9;IFCARR 27;RESP R,3,You already have the technology!
  97. LACT: 3;9;DSET 3,N9
  98.  
  99. /* Room actions follow below ***
  100. /*
  101. /* ACTION: verbno;condition;...;command;...
  102.  
  103. /*
  104. /* Action 0 - Exit
  105. /* ===============
  106. /*
  107. ACTION: 0;IFOBJ 1;MEXIT;GOTO 2,4
  108. ACTION: 0;IFOBJ 2;IFRF 2=0;VERB 5;OBJ1 3;REDO
  109. ACTION: 0;IFOBJ 2;IFRF 2=1;MEXIT;GOTO 18,1
  110. ACTION: 0;IFOBJ 3;MEXIT;GOTO 6,1
  111. ACTION: 0;IFOBJ 4;MEXIT;GOTO 8,1
  112. /*
  113. /* Action 1 - Give
  114. /* ===============
  115. /*
  116. /* Action 2- Pick up
  117. /* =================
  118. /*
  119. /*
  120. /* Action 3 - Use
  121. /* ==============
  122. /*
  123. /* Action 4 - Open
  124. /* ===============
  125. /*
  126. /* Action 5 - Talk to
  127. /* ==================
  128. /*
  129. ACTION: 5;IFOBJ 3;IFOF 1=0;MOBJ;SAY Hello.;RESP R,3,Ahoy there!;DSET 3,+2;EXIT
  130. ACTION: 5;IFOBJ 3;IFOF 1=1;MOBJ;SAY Hello again.;RESP R,3,Hello. What can I do for you now?;DSET 3;EXIT
  131.  
  132. /*
  133. /* Action 6 - Push
  134. /* ===============
  135. /*
  136. /* Action 7 - Close
  137. /* ================
  138.  
  139. /* Action 8 - Look at
  140. /* ==================
  141. /*
  142. ACTION: 8;MOBJ
  143. ACTION: 8;IFOBJ 3;SAY He looks a bit big in comparison with the boat!;EXIT
  144.  
  145. /* Action 9 - Pull
  146. /* ===============
  147.  
  148. /* End of room file. Some comments must be here, otherwise  the last command
  149. /* line is missed out!
  150.